home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 270
- Top = 191
- Width = 435
- Height = 300
- Caption = 'Form1'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 16
- object WPToolBar1: TWPToolBar
- Left = 0
- Top = 0
- Width = 427
- Height = 56
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- sel_ListBoxes = [SelFontName, SelFontSize, SelFontColor, SelBackgroundColor]
- sel_StatusIcons = [SelNormal, SelBold, SelItalic, SelUnder, SelHyperLink, SelStrikeOut, SelLeft, SelRight, SelBlock, SelCenter]
- sel_ActionIcons = []
- sel_DatabaseIcons = [SelToStart, SelNext, SelPrev, SelToEnd, SelEdit, SelAdd, SelDel, SelCancel, SelPost]
- sel_EditIcons = []
- FontSizeFrom = 8
- Hints.Strings = (
- 'WPI_Normal=Normal'
- 'WPI_Bold=Bold'
- 'WPI_Italic=Italic'
- 'WPI_Under=Under'
- 'WPI_Hyperlink=Hyperlink'
- 'WPI_StrikeOut=StrikeOut'
- 'WPI_Left=Left'
- 'WPI_Right=Right'
- 'WPI_Justified=Justified'
- 'WPI_Center=Center'
- 'WPI_Copy=Copy'
- 'WPI_Cut=Cut'
- 'WPI_Paste=Paste'
- 'WPI_SelAll=SelAll'
- 'WPI_HideSel=HideSel'
- 'WPI_Find=Find'
- 'WPI_Replace=Replace'
- 'WPI_Spell=Spell'
- 'WPI_Exit=Exit'
- 'WPI_New=New'
- 'WPI_Open=Open'
- 'WPI_Save=Save'
- 'WPI_Close=Close'
- 'WPI_Print=Print'
- 'WPI_PrintSetup=PrintSetup'
- 'WPI_Next=Next'
- 'WPI_Prev=Prev'
- 'WPI_Add=Add'
- 'WPI_Del=Del'
- 'WPI_Edit=Edit'
- 'WPI_Cancel=Cancel'
- 'WPI_ToStart=ToStart'
- 'WPI_ToEnd=ToEnd'
- 'WPI_Post=Post')
- end
- object DBWPRichText1: TDBWPRichText
- Left = 0
- Top = 56
- Width = 427
- Height = 217
- Cursor = crIBeam
- Language = twpGerman
- WPToolBar = WPToolBar1
- DataField = 'MEMO'
- DataSource = DataSource1
- HyperLinkCursor = crDefault
- NoBlockMarking = False
- OneClickHyperlink = False
- Zooming = 100
- Resizing = 100
- Align = alClient
- BorderStyle = bsSingle
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = False
- ScrollBars = ssNone
- TabOrder = 1
- TabStop = True
- WantTabs = True
- end
- object Table1: TTable
- Active = True
- DatabaseName = 'DATEN'
- TableName = 'TEST.DB'
- Left = 340
- Top = 6
- end
- object DataSource1: TDataSource
- DataSet = Table1
- Left = 376
- Top = 6
- end
- end
-